open Matrix;;
open Vec;;
open Ogl;;
open Gl;;

type sceneNode = 
{
  transform : matrix4;
  geometry : geometryChunk;
  children : sceneNode list;
};;

let rec renderNode n = 
  multMatrix n.transform cgl_modelview_matrix;
  renderChunk n.geometry;
  List.iter renderNode n.children;
  popMatrix cgl_modelview_matrix;;
